home *** CD-ROM | disk | FTP | other *** search
/ Linux Cubed Series 4: GNU Archives / Linux Cubed Series 4 - GNU Archives.iso / gnu / glibc-1.09 / glibc-1 / glibc-1.09.1 / sysdeps / standalone / __close.c < prev    next >
Encoding:
C/C++ Source or Header  |  1994-08-26  |  1.3 KB  |  43 lines
  1. /* Copyright (C) 1994 Free Software Foundation, Inc.
  2.    Ported to standalone by Joel Sherrill jsherril@redstone-emh2.army.mil,
  3.      On-Line Applications Research Corporation.
  4.  
  5. This file is part of the GNU C Library.
  6.  
  7. The GNU C Library is free software; you can redistribute it and/or
  8. modify it under the terms of the GNU Library General Public License as
  9. published by the Free Software Foundation; either version 2 of the
  10. License, or (at your option) any later version.
  11.  
  12. The GNU C Library is distributed in the hope that it will be useful,
  13. but WITHOUT ANY WARRANTY; without even the implied warranty of
  14. MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15. Library General Public License for more details.
  16.  
  17. You should have received a copy of the GNU Library General Public
  18. License along with the GNU C Library; see the file COPYING.LIB.  If
  19. not, write to the Free Software Foundation, Inc., 675 Mass Ave,
  20. Cambridge, MA 02139, USA.  */
  21.  
  22. #include <ansidecl.h>
  23. #include <errno.h>
  24. #include <unistd.h>
  25.  
  26. #include <stdio_lim.h>
  27. #include "filedesc.h"
  28.  
  29. /* Close the file descriptor FD.  */
  30. int
  31. DEFUN(__close, (fd), int fd)
  32. {
  33.   if ( !__FD_Is_valid( fd ) || !__FD_Table[ fd ].in_use )
  34.     {
  35.       errno = EBADF;
  36.       return -1;
  37.     }
  38.  
  39.   __FD_Table[ fd ].in_use = 0;
  40.   return 0;
  41. }
  42.  
  43.